home *** CD-ROM | disk | FTP | other *** search
/ HaCKeRz Kr0nlcKLeZ 1 / HaCKeRz Kr0nlcKLeZ.iso / scriptz / dccchatp.txt < prev    next >
Encoding:
Text File  |  1996-04-23  |  894 b   |  43 lines
  1. Zuperchat!
  2.  
  3. Put this in Remote!
  4.  
  5. ; ----------------------------->  Superchat
  6. #partyline start
  7. 1:ON TEXT:!superchat:*:/dcc chat $nick
  8. 1:ON CHAT:*: {
  9.   set %tchats $chat(0)
  10.   set %cchat 1
  11.   :Repeat
  12.   if $chat(%cchat) == $nick /inc %cchat 1
  13.   msg = $+ $chat(%cchat) < $+ $nick $+ > $parm1*
  14.   inc %cchat 1
  15.   if %cchat > %thats /halt
  16.   goto Repeat
  17. }
  18. 1:ON CHATOPEN: {
  19.   set %coolnick $nick %coolnick 
  20.   set %tchats $chat(0)
  21.   set %cchat 1
  22.   :Repeat
  23.   msg = $+ $chat(%cchat) - $nick Has Joined Superchat
  24.   inc %cchat 1
  25.   if %cchat > %tchats /halt
  26.   goto repeat
  27. }
  28. 1:ON CHATCLOSE: {
  29.   set %coolnick $remove(%coolnick,$nick) 
  30.   set %tchats $chat(0)
  31.   set %cchat 1
  32.   :Repeat
  33.   msg = $+ $chat(%cchat) - $nick Has Left Superchat
  34.   inc %cchat 1
  35.   if %cchat > %tchats /halt
  36.   goto repeat
  37. }
  38. #partyline end
  39.  
  40. Made By God_Knows
  41.  
  42. UPLOADED TO WWW.SCRIPTERZ.COM BY |^JoLt^|
  43.